<!--#include virtual="/Common/Config.asp" -->
<!--#include virtual="/Common/conn.asp" -->
<!--#include virtual="/2010admin/Check_IsLogin.asp" -->
<!--#include virtual="/Common/Function.asp" -->
<%
Response.Expires = 0
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"


Sql = "SELECT TOP 6 corp_tag,count(*) AS tag_count FROM Corp_Info_Tag GROUP BY corp_tag ORDER BY tag_count DESC"

Array_List = GetRsRows(Sql)
Corp_Tag_S = ""
If IsArray(Array_List) Then 
	For i=0 To UBound(Array_List,2)
		Tag = Array_List(0,i)
		Corp_Tag_S = Corp_Tag_S&","&Tag
	Next 
End If 
If Corp_Tag_S<>"" Then 
	Corp_Tag_S = Mid(Corp_Tag_S,2,Len(Corp_Tag_S)-1)
End If 
Response.Write Corp_Tag_S

%>
